My meme uses a cartoon image of the Grinch I found online.
The
comedy is a little niche and is meant to be absurd in nature and works
similarly as an anti-joke. This type of comedy generally becomes amusing
once one has seen too many memes. The mundanity and minor shock value
becomes comedy when in contrast to other memes the audience would be
overstaturated with. It is perhaps enjoyed ironically.
library(magick)
funny <- image_read("grinchsmile.jpg")
funnyScaled <- funny %>%
image_scale(200)
# Scale the funny image for ease of viewing.
# Adds funny text
# Saves the funny image
funnyAnnotated <- funnyScaled %>%
image_annotate("Me when I commit a petty crime")
funnyAnnotated %>%
image_write("my_meme.png")
funnyAnnotated
My animated GIF is of a person slicing “HOW IT FEELS AT 2AM” which I made at 1 am.
library(magick)
# Read all the image names
image_files <- list.files("Spear", pattern = "*.png", full.names = TRUE)
# Put all the read images in a vector for animation
images <- image_read(image_files)
# Animate the images
animation <- image_animate(images, delay = 15)
# Write the animation as a .gif
image_write(animation, "animation.gif")